home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 May / macformat-024.iso / Demos / DTP / HomePublisher Demo / AHP Pouch / AutoCreate / Business ID / _SetStyle < prev    next >
MacBinary  |  1993-09-17  |  11.6 KB  |  [SGPA/SCPG]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
100% file MacBinary II, Thu Sep 16 20:00:00 1993, modified Thu Sep 16 20:00:00 1993, creator 'SCPG', type 'SGPA', 11161 bytes "_SetStyle" , at 0x2c19 402 bytes resource default (weak)
99% file data default
100% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[SGPA]
macFileCreator[SCPG]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 5f 53 65 74 53 74 | 79 6c 65 00 00 00 00 00 |.._SetSt|yle.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 53 47 50 41 53 43 50 | 47 00 00 00 00 00 00 00 |.SGPASCP|G.......|
|00000050| 00 00 00 00 00 2b 99 00 | 00 01 92 a8 be ae 80 a8 |.....+..|........|
|00000060| be ae 80 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 2c c2 00 00 |........|....,...|
|00000080| 6f 6e 20 43 6f 72 70 6f | 72 61 74 65 0d 47 6c 6f |on Corpo|rate.Glo|
|00000090| 62 61 6c 20 74 68 65 41 | 64 64 72 65 73 73 44 61 |bal theA|ddressDa|
|000000a0| 74 61 2c 20 76 48 65 6c | 76 65 74 69 63 61 0d 47 |ta, vHel|vetica.G|
|000000b0| 6c 6f 62 61 6c 20 44 6f | 63 75 6d 65 6e 74 4b 69 |lobal Do|cumentKi|
|000000c0| 6e 64 0d 0d 69 66 20 44 | 6f 63 75 6d 65 6e 74 4b |nd..if D|ocumentK|
|000000d0| 69 6e 64 20 ad 20 22 62 | 75 73 69 6e 65 73 73 20 |ind . "b|usiness |
|000000e0| 63 61 72 64 22 20 74 68 | 65 6e 0d 73 65 74 20 69 |card" th|en.set i|
|000000f0| 74 65 6d 64 65 6c 20 74 | 6f 20 6e 75 6d 74 6f 63 |temdel t|o numtoc|
|00000100| 68 61 72 28 31 29 0d 70 | 75 74 20 31 20 69 6e 74 |har(1).p|ut 1 int|
|00000110| 6f 20 6c 69 6e 65 63 6f | 75 6e 74 0d 72 65 70 65 |o lineco|unt.repe|
|00000120| 61 74 20 77 69 74 68 20 | 78 20 3d 20 31 20 74 6f |at with |x = 1 to|
|00000130| 20 31 32 2d 2d 32 20 74 | 6f 20 39 0d 67 65 74 20 | 12--2 t|o 9.get |
|00000140| 69 74 65 6d 20 78 20 6f | 66 20 74 68 65 41 64 64 |item x o|f theAdd|
|00000150| 72 65 73 73 44 61 74 61 | 0d 69 66 20 69 74 20 ad |ressData|.if it .|
|00000160| 20 65 6d 70 74 79 20 74 | 68 65 6e 0d 70 75 74 20 | empty t|hen.put |
|00000170| 69 74 20 69 6e 74 6f 20 | 6c 69 6e 65 20 6c 69 6e |it into |line lin|
|00000180| 65 63 6f 75 6e 74 20 6f | 66 20 54 68 65 54 65 78 |ecount o|f TheTex|
|00000190| 74 0d 61 64 64 20 31 20 | 74 6f 20 6c 69 6e 65 63 |t.add 1 |to linec|
|000001a0| 6f 75 6e 74 0d 65 6e 64 | 20 69 66 0d 65 6e 64 20 |ount.end| if.end |
|000001b0| 72 65 70 65 61 74 0d 73 | 65 74 20 69 74 65 6d 64 |repeat.s|et itemd|
|000001c0| 65 6c 20 74 6f 20 22 2c | 22 0d 0d 70 75 74 20 54 |el to ",|"..put T|
|000001d0| 68 65 54 65 78 74 20 69 | 6e 74 6f 20 73 74 6f 72 |heText i|nto stor|
|000001e0| 79 20 22 41 64 64 72 65 | 73 73 22 0d 73 65 6c 65 |y "Addre|ss".sele|
|000001f0| 63 74 20 61 6c 6c 20 74 | 65 78 74 20 69 6e 20 73 |ct all t|ext in s|
|00000200| 74 6f 72 79 20 22 61 64 | 64 72 65 73 73 22 0d 73 |tory "ad|dress".s|
|00000210| 65 74 20 53 74 79 6c 65 | 52 65 63 6f 6d 70 6f 73 |et Style|Recompos|
|00000220| 69 74 69 6f 6e 20 74 6f | 20 66 61 6c 73 65 0d 73 |ition to| false.s|
|00000230| 65 74 20 74 65 78 74 66 | 6f 6e 74 20 74 6f 20 76 |et textf|ont to v|
|00000240| 48 65 6c 76 65 74 69 63 | 61 0d 73 65 74 20 74 65 |Helvetic|a.set te|
|00000250| 78 74 73 69 7a 65 20 74 | 6f 20 31 30 0d 73 65 74 |xtsize t|o 10.set|
|00000260| 20 52 75 6c 65 72 4a 75 | 73 74 69 66 69 63 61 74 | RulerJu|stificat|
|00000270| 69 6f 6e 20 74 6f 20 6c | 65 66 74 0d 73 65 74 20 |ion to l|eft.set |
|00000280| 53 74 79 6c 65 52 65 63 | 6f 6d 70 6f 73 69 74 69 |StyleRec|ompositi|
|00000290| 6f 6e 20 74 6f 20 74 72 | 75 65 0d 63 6f 70 79 66 |on to tr|ue.copyf|
|000002a0| 69 74 0d 65 6c 73 65 20 | 2d 2d 20 6d 61 6b 65 20 |it.else |-- make |
|000002b0| 73 6f 6d 65 20 63 61 72 | 64 73 0d 0d 2d 2d 20 62 |some car|ds..-- b|
|000002c0| 75 69 6c 64 20 61 64 64 | 72 65 73 73 20 62 6c 6f |uild add|ress blo|
|000002d0| 63 6b 0d 70 75 74 20 65 | 6d 70 74 79 20 69 6e 74 |ck.put e|mpty int|
|000002e0| 6f 20 54 68 65 54 65 78 | 74 0d 73 65 74 20 69 74 |o TheTex|t.set it|
|000002f0| 65 6d 64 65 6c 20 74 6f | 20 6e 75 6d 74 6f 63 68 |emdel to| numtoch|
|00000300| 61 72 28 31 29 0d 70 75 | 74 20 31 20 69 6e 74 6f |ar(1).pu|t 1 into|
|00000310| 20 6c 69 6e 65 63 6f 75 | 6e 74 0d 72 65 70 65 61 | linecou|nt.repea|
|00000320| 74 20 77 69 74 68 20 78 | 20 3d 20 32 20 74 6f 20 |t with x| = 2 to |
|00000330| 31 32 20 2d 2d 32 20 74 | 6f 20 37 0d 69 66 20 78 |12 --2 t|o 7.if x|
|00000340| 20 ad 20 31 30 20 74 68 | 65 6e 0d 67 65 74 20 69 | . 10 th|en.get i|
|00000350| 74 65 6d 20 78 20 6f 66 | 20 74 68 65 41 64 64 72 |tem x of| theAddr|
|00000360| 65 73 73 44 61 74 61 0d | 69 66 20 69 74 20 ad 20 |essData.|if it . |
|00000370| 65 6d 70 74 79 20 74 68 | 65 6e 0d 70 75 74 20 69 |empty th|en.put i|
|00000380| 74 20 69 6e 74 6f 20 6c | 69 6e 65 20 6c 69 6e 65 |t into l|ine line|
|00000390| 63 6f 75 6e 74 20 6f 66 | 20 54 68 65 54 65 78 74 |count of| TheText|
|000003a0| 0d 61 64 64 20 31 20 74 | 6f 20 6c 69 6e 65 63 6f |.add 1 t|o lineco|
|000003b0| 75 6e 74 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 69 |unt.end |if.end i|
|000003c0| 66 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 70 75 74 |f.end re|peat.put|
|000003d0| 20 54 68 65 54 65 78 74 | 20 69 6e 74 6f 20 73 74 | TheText| into st|
|000003e0| 6f 72 79 20 22 61 64 64 | 72 65 73 73 20 31 22 0d |ory "add|ress 1".|
|000003f0| 0d 73 65 6c 65 63 74 20 | 61 6c 6c 20 74 65 78 74 |.select |all text|
|00000400| 20 69 6e 20 73 74 6f 72 | 79 20 22 61 64 64 72 65 | in stor|y "addre|
|00000410| 73 73 20 31 22 0d 73 65 | 74 20 53 74 79 6c 65 52 |ss 1".se|t StyleR|
|00000420| 65 63 6f 6d 70 6f 73 69 | 74 69 6f 6e 20 74 6f 20 |ecomposi|tion to |
|00000430| 66 61 6c 73 65 0d 73 65 | 74 20 74 65 78 74 66 6f |false.se|t textfo|
|00000440| 6e 74 20 74 6f 20 76 48 | 65 6c 76 65 74 69 63 61 |nt to vH|elvetica|
|00000450| 0d 73 65 74 20 74 65 78 | 74 66 61 63 65 20 74 6f |.set tex|tface to|
|00000460| 20 70 6c 61 69 6e 0d 73 | 65 74 20 74 65 78 74 73 | plain.s|et texts|
|00000470| 69 7a 65 20 74 6f 20 31 | 32 0d 73 65 74 20 52 75 |ize to 1|2.set Ru|
|00000480| 6c 65 72 4a 75 73 74 69 | 66 69 63 61 74 69 6f 6e |lerJusti|fication|
|00000490| 20 74 6f 20 6c 65 66 74 | 0d 73 65 74 20 53 74 79 | to left|.set Sty|
|000004a0| 6c 65 52 65 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 20 |leRecomp|osition |
|000004b0| 74 6f 20 74 72 75 65 0d | 63 6f 70 79 66 69 74 0d |to true.|copyfit.|
|000004c0| 0d 0d 2d 2d 20 62 75 69 | 6c 64 20 6e 61 6d 65 2f |..-- bui|ld name/|
|000004d0| 70 6f 73 69 74 69 6f 6e | 20 62 6c 6f 63 6b 0d 70 |position| block.p|
|000004e0| 75 74 20 65 6d 70 74 79 | 20 69 6e 74 6f 20 54 68 |ut empty| into Th|
|000004f0| 65 54 65 78 74 0d 67 65 | 74 20 69 74 65 6d 20 31 |eText.ge|t item 1|
|00000500| 20 6f 66 20 74 68 65 41 | 64 64 72 65 73 73 44 61 | of theA|ddressDa|
|00000510| 74 61 0d 69 66 20 69 74 | 20 ad 20 65 6d 70 74 79 |ta.if it| . empty|
|00000520| 20 74 68 65 6e 0d 70 75 | 74 20 69 74 20 69 6e 74 | then.pu|t it int|
|00000530| 6f 20 73 74 6f 72 79 20 | 22 70 65 72 73 6f 6e 20 |o story |"person |
|00000540| 31 22 0d 73 65 6c 65 63 | 74 20 61 6c 6c 20 74 65 |1".selec|t all te|
|00000550| 78 74 20 69 6e 20 73 74 | 6f 72 79 20 22 70 65 72 |xt in st|ory "per|
|00000560| 73 6f 6e 20 31 22 0d 73 | 65 74 20 74 65 78 74 66 |son 1".s|et textf|
|00000570| 6f 6e 74 20 74 6f 20 76 | 48 65 6c 76 65 74 69 63 |ont to v|Helvetic|
|00000580| 61 0d 73 65 74 20 74 65 | 78 74 66 61 63 65 20 74 |a.set te|xtface t|
|00000590| 6f 20 70 6c 61 69 6e 0d | 73 65 74 20 74 65 78 74 |o plain.|set text|
|000005a0| 66 61 63 65 20 74 6f 20 | 75 70 70 65 72 63 61 73 |face to |uppercas|
|000005b0| 65 0d 65 6e 64 20 69 66 | 0d 67 65 74 20 69 74 65 |e.end if|.get ite|
|000005c0| 6d 20 31 30 20 6f 66 20 | 74 68 65 41 64 64 72 65 |m 10 of |theAddre|
|000005d0| 73 73 44 61 74 61 0d 69 | 66 20 69 74 20 ad 20 65 |ssData.i|f it . e|
|000005e0| 6d 70 74 79 20 74 68 65 | 6e 0d 70 75 74 20 63 72 |mpty the|n.put cr|
|000005f0| 26 69 74 20 61 66 74 65 | 72 20 73 74 6f 72 79 20 |&it afte|r story |
|00000600| 22 70 65 72 73 6f 6e 20 | 31 22 0d 73 65 6c 65 63 |"person |1".selec|
|00000610| 74 20 74 65 78 74 20 6c | 61 73 74 20 6c 69 6e 65 |t text l|ast line|
|00000620| 20 6f 66 20 73 74 6f 72 | 79 20 22 70 65 72 73 6f | of stor|y "perso|
|00000630| 6e 20 31 22 0d 73 65 74 | 20 74 65 78 74 66 6f 6e |n 1".set| textfon|
|00000640| 74 20 74 6f 20 76 48 65 | 6c 76 65 74 69 63 61 0d |t to vHe|lvetica.|
|00000650| 73 65 74 20 74 65 78 74 | 66 61 63 65 20 74 6f 20 |set text|face to |
|00000660| 70 6c 61 69 6e 0d 65 6e | 64 20 69 66 0d 73 65 6c |plain.en|d if.sel|
|00000670| 65 63 74 20 61 6c 6c 20 | 74 65 78 74 20 69 6e 20 |ect all |text in |
|00000680| 73 74 6f 72 79 20 22 70 | 65 72 73 6f 6e 20 31 22 |story "p|erson 1"|
|00000690| 0d 73 65 74 20 46 6c 65 | 78 69 62 6c 65 43 68 61 |.set Fle|xibleCha|
|000006a0| 72 53 69 7a 65 20 74 6f | 20 66 61 6c 73 65 0d 73 |rSize to| false.s|
|000006b0| 65 74 20 53 74 79 6c 65 | 52 65 63 6f 6d 70 6f 73 |et Style|Recompos|
|000006c0| 69 74 69 6f 6e 20 74 6f | 20 66 61 6c 73 65 0d 73 |ition to| false.s|
|000006d0| 65 74 20 74 65 78 74 73 | 69 7a 65 20 74 6f 20 31 |et texts|ize to 1|
|000006e0| 32 0d 73 65 74 20 52 75 | 6c 65 72 4a 75 73 74 69 |2.set Ru|lerJusti|
|000006f0| 66 69 63 61 74 69 6f 6e | 20 74 6f 20 72 69 67 68 |fication| to righ|
|00000700| 74 0d 73 65 74 20 53 74 | 79 6c 65 52 65 63 6f 6d |t.set St|yleRecom|
|00000710| 70 6f 73 69 74 69 6f 6e | 20 74 6f 20 74 72 75 65 |position| to true|
|00000720| 0d 63 6f 70 79 66 69 74 | 20 0d 0d 73 65 6c 65 63 |.copyfit| ..selec|
|00000730| 74 20 61 6c 6c 20 6f 62 | 6a 65 63 74 73 0d 70 75 |t all ob|jects.pu|
|00000740| 74 20 6d 65 61 73 75 72 | 65 6d 65 6e 74 73 20 69 |t measur|ements i|
|00000750| 6e 74 6f 20 6f 6c 64 4d | 65 61 73 75 72 65 6d 65 |nto oldM|easureme|
|00000760| 6e 74 73 0d 73 65 74 20 | 6d 65 61 73 75 72 65 6d |nts.set |measurem|
|00000770| 65 6e 74 73 20 74 6f 20 | 6d 69 6c 6c 69 6d 65 74 |ents to |millimet|
|00000780| 65 72 73 0d 72 65 70 6c | 69 63 61 74 65 20 63 75 |ers.repl|icate cu|
|00000790| 73 74 6f 6d 20 31 20 39 | 38 20 31 30 30 20 30 20 |stom 1 9|8 100 0 |
|000007a0| 31 30 30 0d 73 65 6c 65 | 63 74 20 61 6c 6c 20 6f |100.sele|ct all o|
|000007b0| 62 6a 65 63 74 73 0d 72 | 65 70 6c 69 63 61 74 65 |bjects.r|eplicate|
|000007c0| 20 63 75 73 74 6f 6d 20 | 33 20 30 20 31 30 30 20 | custom |3 0 100 |
|000007d0| 35 38 20 31 30 30 0d 73 | 65 6c 65 63 74 20 65 6d |58 100.s|elect em|
|000007e0| 70 74 79 0d 73 65 74 20 | 6d 65 61 73 75 72 65 6d |pty.set |measurem|
|000007f0| 65 6e 74 73 20 74 6f 20 | 6f 6c 64 4d 65 61 73 75 |ents to |oldMeasu|
|00000800| 72 65 6d 65 6e 74 73 0d | 73 65 74 20 69 74 65 6d |rements.|set item|
|00000810| 64 65 6c 20 74 6f 20 22 | 2c 22 0d 61 6e 73 77 65 |del to "|,".answe|
|00000820| 72 20 22 53 65 6c 65 63 | 74 20 22 20 26 20 71 75 |r "Selec|t " & qu|
|00000830| 6f 74 65 20 26 20 22 4c | 61 72 67 65 72 20 50 72 |ote & "L|arger Pr|
|00000840| 69 6e 74 20 41 72 65 61 | 22 20 26 20 71 75 6f 74 |int Area|" & quot|
|00000850| 65 20 26 20 22 20 66 72 | 6f 6d 20 4f 70 74 69 6f |e & " fr|om Optio|
|00000860| 6e 73 c9 22 20 77 69 74 | 68 20 22 4f 4b 22 0d 64 |ns." wit|h "OK".d|
|00000870| 6f 6d 65 6e 75 20 22 50 | 61 67 65 20 53 65 74 75 |omenu "P|age Setu|
|00000880| 70 c9 22 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 43 |p.".end |if.end C|
|00000890| 6f 72 70 6f 72 61 74 65 | 0d 0d 0d 6f 6e 20 45 6c |orporate|...on El|
|000008a0| 65 67 61 6e 74 0d 47 6c | 6f 62 61 6c 20 74 68 65 |egant.Gl|obal the|
|000008b0| 41 64 64 72 65 73 73 44 | 61 74 61 2c 20 76 50 61 |AddressD|ata, vPa|
|000008c0| 6c 61 74 69 6e 6f 2c 76 | 48 65 6c 76 65 74 69 63 |latino,v|Helvetic|
|000008d0| 61 0d 47 6c 6f 62 61 6c | 20 44 6f 63 75 6d 65 6e |a.Global| Documen|
|000008e0| 74 4b 69 6e 64 0d 0d 0d | 73 65 74 20 6c 69 6e 65 |tKind...|set line|
|000008f0| 64 65 6c 20 74 6f 20 6e | 75 6d 74 6f 63 68 61 72 |del to n|umtochar|
|00000900| 28 31 29 0d 73 65 74 20 | 69 74 65 6d 64 65 6c 20 |(1).set |itemdel |
|00000910| 74 6f 20 6e 75 6d 74 6f | 63 68 61 72 28 31 29 20 |to numto|char(1) |
|00000920| 2d 2d 20 68 61 76 65 20 | 74 6f 20 64 6f 20 74 68 |-- have |to do th|
|00000930| 69 73 20 73 6f 20 63 6f | 6d 6d 61 73 20 69 6e 20 |is so co|mmas in |
|00000940| 61 64 64 72 65 73 73 65 | 73 20 61 72 65 6e 27 74 |addresse|s aren't|
|00000950| 20 69 67 6e 6f 72 65 64 | 0d 73 65 74 20 66 69 6e | ignored|.set fin|
|00000960| 64 53 74 72 69 6e 67 20 | 74 6f 20 6e 75 6d 74 6f |dString |to numto|
|00000970| 43 68 61 72 28 31 29 0d | 73 65 74 20 72 65 70 6c |Char(1).|set repl|
|00000980| 61 63 65 53 74 72 69 6e | 67 20 74 6f 20 22 2c 20 |aceStrin|g to ", |
|00000990| 22 0d 0d 67 65 74 20 6c | 69 6e 65 20 32 20 6f 66 |"..get l|ine 2 of|
|000009a0| 20 74 68 65 41 64 64 72 | 65 73 73 44 61 74 61 0d | theAddr|essData.|
|000009b0| 69 66 20 69 74 20 20 ad | 20 65 6d 70 74 79 20 74 |if it .| empty t|
|000009c0| 68 65 6e 20 70 75 74 20 | 69 74 20 69 6e 74 6f 20 |hen put |it into |
|000009d0| 73 74 6f 72 79 20 22 43 | 6f 6d 70 61 6e 79 20 4e |story "C|ompany N|
|000009e0| 61 6d 65 22 0d 0d 2d 2d | 20 53 65 74 20 63 6f 6d |ame"..--| Set com|
|000009f0| 70 61 6e 79 20 6e 61 6d | 65 20 73 74 79 6c 65 0d |pany nam|e style.|
|00000a00| 53 65 6c 65 63 74 20 61 | 6c 6c 20 74 65 78 74 20 |Select a|ll text |
|00000a10| 69 6e 20 73 74 6f 72 79 | 20 22 43 6f 6d 70 61 6e |in story| "Compan|
|00000a20| 79 20 4e 61 6d 65 22 0d | 73 65 74 20 53 74 79 6c |y Name".|set Styl|
|00000a30| 65 52 65 63 6f 6d 70 6f | 73 69 74 69 6f 6e 20 74 |eRecompo|sition t|
|00000a40| 6f 20 66 61 6c 73 65 0d | 73 65 74 20 74 65 78 74 |o false.|set text|
|00000a50| 66 6f 6e 74 20 74 6f 20 | 76 50 61 6c 61 74 69 6e |font to |vPalatin|
|00000a60| 6f 0d 73 65 74 20 74 65 | 78 74 66 61 63 65 20 74 |o.set te|xtface t|
|00000a70| 6f 20 70 6c 61 69 6e 0d | 53 65 74 20 54 65 78 74 |o plain.|Set Text|
|00000a80| 53 69 7a 65 20 74 6f 20 | 31 38 0d 73 65 74 20 52 |Size to |18.set R|
|00000a90| 75 6c 65 72 4a 75 73 74 | 69 66 69 63 61 74 69 6f |ulerJust|ificatio|
|00000aa0| 6e 20 74 6f 20 43 65 6e | 74 65 72 0d 73 65 74 20 |n to Cen|ter.set |
|00000ab0| 54 65 78 74 46 61 63 65 | 20 74 6f 20 53 6d 61 6c |TextFace| to Smal|
|00000ac0| 6c 43 61 70 73 0d 73 65 | 74 20 53 74 79 6c 65 52 |lCaps.se|t StyleR|
|00000ad0| 65 63 6f 6d 70 6f 73 69 | 74 69 6f 6e 20 74 6f 20 |ecomposi|tion to |
|00000ae0| 74 72 75 65 0d 69 66 20 | 6e 6f 74 20 73 74 6f 72 |true.if |not stor|
|00000af0| 79 66 69 74 73 28 73 74 | 6f 72 79 20 22 43 6f 6d |yfits(st|ory "Com|
|00000b00| 70 61 6e 79 20 4e 61 6d | 65 22 29 20 74 68 65 6e |pany Nam|e") then|
|00000b10| 20 0d 73 65 74 20 74 65 | 78 74 66 61 63 65 20 74 | .set te|xtface t|
|00000b20| 6f 20 70 6c 61 69 6e 0d | 63 6f 70 79 66 69 74 0d |o plain.|copyfit.|
|00000b30| 65 6e 64 20 69 66 0d 0d | 69 66 20 44 6f 63 75 6d |end if..|if Docum|
|00000b40| 65 6e 74 4b 69 6e 64 20 | ad 20 22 62 75 73 69 6e |entKind |. "busin|
|00000b50| 65 73 73 20 63 61 72 64 | 22 20 74 68 65 6e 0d 70 |ess card|" then.p|
|00000b60| 75 74 20 31 20 69 6e 74 | 6f 20 69 74 65 6d 63 6f |ut 1 int|o itemco|
|00000b70| 75 6e 74 0d 72 65 70 65 | 61 74 20 77 69 74 68 20 |unt.repe|at with |
|00000b80| 78 20 3d 20 31 20 74 6f | 20 31 32 2d 2d 33 20 74 |x = 1 to| 12--3 t|
|00000b90| 6f 20 39 0d 69 66 20 78 | 20 3c 3e 20 32 20 74 68 |o 9.if x| <> 2 th|
|00000ba0| 65 6e 20 2d 2d 20 73 6b | 69 70 20 63 6f 6d 70 61 |en -- sk|ip compa|
|00000bb0| 6e 79 20 6e 61 6d 65 20 | 69 6e 20 74 68 69 73 20 |ny name |in this |
|00000bc0| 62 6c 6f 63 6b 0d 67 65 | 74 20 6c 69 6e 65 20 78 |block.ge|t line x|
|00000bd0| 20 6f 66 20 74 68 65 41 | 64 64 72 65 73 73 44 61 | of theA|ddressDa|
|00000be0| 74 61 0d 69 66 20 69 74 | 20 ad 20 65 6d 70 74 79 |ta.if it| . empty|
|00000bf0| 20 74 68 65 6e 0d 70 75 | 74 20 69 74 20 69 6e 74 | then.pu|t it int|
|00000c00| 6f 20 69 74 65 6d 20 69 | 74 65 6d 63 6f 75 6e 74 |o item i|temcount|
|00000c10| 20 6f 66 20 54 68 65 54 | 65 78 74 0d 61 64 64 20 | of TheT|ext.add |
|00000c20| 31 20 74 6f 20 69 74 65 | 6d 63 6f 75 6e 74 0d 65 |1 to ite|mcount.e|
|00000c30| 6e 64 20 69 66 0d 65 6e | 64 20 69 66 0d 65 6e 64 |nd if.en|d if.end|
|00000c40| 20 72 65 70 65 61 74 0d | 73 65 74 20 6c 69 6e 65 | repeat.|set line|
|00000c50| 64 65 6c 20 74 6f 20 63 | 72 0d 0d 70 75 74 20 54 |del to c|r..put T|
|00000c60| 68 65 54 65 78 74 20 69 | 6e 74 6f 20 73 74 6f 72 |heText i|nto stor|
|00000c70| 79 20 22 41 64 64 72 65 | 73 73 22 0d 73 65 6c 65 |y "Addre|ss".sele|
|00000c80| 63 74 20 61 6c 6c 20 74 | 65 78 74 20 69 6e 20 73 |ct all t|ext in s|
|00000c90| 74 6f 72 79 20 22 41 64 | 64 72 65 73 73 22 0d 70 |tory "Ad|dress".p|
|00000ca0| 75 74 20 72 65 70 6c 61 | 63 65 61 6c 6c 28 73 74 |ut repla|ceall(st|
|00000cb0| 6f 72 79 20 22 41 64 64 | 72 65 73 73 22 29 20 69 |ory "Add|ress") i|
|00000cc0| 6e 74 6f 20 72 65 70 6c | 61 63 65 43 6f 75 6e 74 |nto repl|aceCount|
|00000cd0| 0d 73 65 6c 65 63 74 20 | 61 6c 6c 20 74 65 78 74 |.select |all text|
|00000ce0| 20 69 6e 20 73 74 6f 72 | 79 20 22 41 64 64 72 65 | in stor|y "Addre|
|00000cf0| 73 73 22 0d 73 65 74 20 | 53 74 79 6c 65 52 65 63 |ss".set |StyleRec|
|00000d00| 6f 6d 70 6f 73 69 74 69 | 6f 6e 20 74 6f 20 66 61 |ompositi|on to fa|
|00000d10| 6c 73 65 0d 73 65 74 20 | 74 65 78 74 66 6f 6e 74 |lse.set |textfont|
|00000d20| 20 74 6f 20 76 50 61 6c | 61 74 69 6e 6f 0d 73 65 | to vPal|atino.se|
|00000d30| 74 20 74 65 78 74 66 61 | 63 65 20 74 6f 20 70 6c |t textfa|ce to pl|
|00000d40| 61 69 6e 0d 73 65 74 20 | 74 65 78 74 73 69 7a 65 |ain.set |textsize|
|00000d50| 20 74 6f 20 31 32 0d 73 | 65 74 20 52 75 6c 65 72 | to 12.s|et Ruler|
|00000d60| 4a 75 73 74 69 66 69 63 | 61 74 69 6f 6e 20 74 6f |Justific|ation to|
|00000d70| 20 63 65 6e 74 65 72 0d | 73 65 74 20 74 65 78 74 | center.|set text|
|00000d80| 66 61 63 65 20 74 6f 20 | 53 6d 61 6c 6c 43 61 70 |face to |SmallCap|
|00000d90| 73 0d 73 65 74 20 53 74 | 79 6c 65 52 65 63 6f 6d |s.set St|yleRecom|
|00000da0| 70 6f 73 69 74 69 6f 6e | 20 74 6f 20 74 72 75 65 |position| to true|
|00000db0| 0d 69 66 20 6e 6f 74 20 | 73 74 6f 72 79 66 69 74 |.if not |storyfit|
|00000dc0| 73 28 73 74 6f 72 79 20 | 22 41 64 64 72 65 73 73 |s(story |"Address|
|00000dd0| 22 29 20 74 68 65 6e 20 | 0d 73 65 74 20 74 65 78 |") then |.set tex|
|00000de0| 74 66 61 63 65 20 74 6f | 20 70 6c 61 69 6e 0d 63 |tface to| plain.c|
|00000df0| 6f 70 79 66 69 74 0d 65 | 6e 64 20 69 66 0d 65 6c |opyfit.e|nd if.el|
|00000e00| 73 65 20 2d 2d 20 74 69 | 6d 65 20 74 6f 20 6d 61 |se -- ti|me to ma|
|00000e10| 6b 65 20 73 6f 6d 65 20 | 63 61 72 64 73 0d 0d 2d |ke some |cards..-|
|00000e20| 2d 20 62 75 69 6c 64 20 | 61 64 64 72 65 73 73 20 |- build |address |
|00000e30| 62 6c 6f 63 6b 0d 0d 70 | 75 74 20 65 6d 70 74 79 |block..p|ut empty|
|00000e40| 20 69 6e 74 6f 20 54 68 | 65 54 65 78 74 0d 73 65 | into Th|eText.se|
|00000e50| 74 20 6c 69 6e 65 64 65 | 6c 20 74 6f 20 6e 75 6d |t linede|l to num|
|00000e60| 74 6f 63 68 61 72 28 31 | 29 0d 70 75 74 20 31 20 |tochar(1|).put 1 |
|00000e70| 69 6e 74 6f 20 69 74 65 | 6d 63 6f 75 6e 74 0d 72 |into ite|mcount.r|
|00000e80| 65 70 65 61 74 20 77 69 | 74 68 20 78 20 3d 20 33 |epeat wi|th x = 3|
|00000e90| 20 74 6f 20 36 20 2d 2d | 32 20 74 6f 20 36 0d 67 | to 6 --|2 to 6.g|
|00000ea0| 65 74 20 6c 69 6e 65 20 | 78 20 6f 66 20 74 68 65 |et line |x of the|
|00000eb0| 41 64 64 72 65 73 73 44 | 61 74 61 0d 69 66 20 69 |AddressD|ata.if i|
|00000ec0| 74 20 ad 20 65 6d 70 74 | 79 20 74 68 65 6e 0d 70 |t . empt|y then.p|
|00000ed0| 75 74 20 69 74 20 69 6e | 74 6f 20 69 74 65 6d 20 |ut it in|to item |
|00000ee0| 69 74 65 6d 63 6f 75 6e | 74 20 6f 66 20 54 68 65 |itemcoun|t of The|
|00000ef0| 54 65 78 74 0d 61 64 64 | 20 31 20 74 6f 20 69 74 |Text.add| 1 to it|
|00000f00| 65 6d 63 6f 75 6e 74 0d | 65 6e 64 20 69 66 0d 65 |emcount.|end if.e|
|00000f10| 6e 64 20 72 65 70 65 61 | 74 0d 70 75 74 20 54 68 |nd repea|t.put Th|
|00000f20| 65 54 65 78 74 20 69 6e | 74 6f 20 73 74 6f 72 79 |eText in|to story|
|00000f30| 20 22 61 64 64 72 65 73 | 73 20 31 22 0d 70 75 74 | "addres|s 1".put|
|00000f40| 20 72 65 70 6c 61 63 65 | 61 6c 6c 28 73 74 6f 72 | replace|all(stor|
|00000f50| 79 20 22 61 64 64 72 65 | 73 73 20 31 22 29 20 69 |y "addre|ss 1") i|
|00000f60| 6e 74 6f 20 72 65 70 6c | 61 63 65 43 6f 75 6e 74 |nto repl|aceCount|
|00000f70| 0d 0d 2d 2d 20 62 75 69 | 6c 64 20 70 68 6f 6e 65 |..-- bui|ld phone|
|00000f80| 20 62 6c 6f 63 6b 0d 70 | 75 74 20 65 6d 70 74 79 | block.p|ut empty|
|00000f90| 20 69 6e 74 6f 20 54 68 | 65 54 65 78 74 0d 70 75 | into Th|eText.pu|
|00000fa0| 74 20 31 20 69 6e 74 6f | 20 69 74 65 6d 63 6f 75 |t 1 into| itemcou|
|00000fb0| 6e 74 0d 72 65 70 65 61 | 74 20 77 69 74 68 20 78 |nt.repea|t with x|
|00000fc0| 20 3d 20 20 37 20 74 6f | 20 31 32 20 2d 2d 37 20 | = 7 to| 12 --7 |
|00000fd0| 74 6f 20 39 0d 69 66 20 | 78 20 ad 20 31 30 20 74 |to 9.if |x . 10 t|
|00000fe0| 68 65 6e 0d 67 65 74 20 | 6c 69 6e 65 20 78 20 6f |hen.get |line x o|
|00000ff0| 66 20 74 68 65 41 64 64 | 72 65 73 73 44 61 74 61 |f theAdd|ressData|
|00001000| 0d 69 66 20 69 74 20 ad | 20 65 6d 70 74 79 20 74 |.if it .| empty t|
|00001010| 68 65 6e 0d 70 75 74 20 | 69 74 20 69 6e 74 6f 20 |hen.put |it into |
|00001020| 69 74 65 6d 20 69 74 65 | 6d 63 6f 75 6e 74 20 6f |item ite|mcount o|
|00001030| 66 20 54 68 65 54 65 78 | 74 0d 61 64 64 20 31 20 |f TheTex|t.add 1 |
|00001040| 74 6f 20 69 74 65 6d 63 | 6f 75 6e 74 0d 65 6e 64 |to itemc|ount.end|
|00001050| 20 69 66 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 | if.end |if.end r|
|00001060| 65 70 65 61 74 0d 69 66 | 20 74 68 65 54 65 78 74 |epeat.if| theText|
|00001070| 20 ad 20 65 6d 70 74 79 | 20 74 68 65 6e 20 70 75 | . empty| then pu|
|00001080| 74 20 63 72 26 74 68 65 | 54 65 78 74 20 61 66 74 |t cr&the|Text aft|
|00001090| 65 72 20 73 74 6f 72 79 | 20 22 61 64 64 72 65 73 |er story| "addres|
|000010a0| 73 20 31 22 0d 73 65 74 | 20 6c 69 6e 65 64 65 6c |s 1".set| linedel|
|000010b0| 20 74 6f 20 63 72 0d 0d | 70 75 74 20 72 65 70 6c | to cr..|put repl|
|000010c0| 61 63 65 61 6c 6c 28 73 | 74 6f 72 79 20 22 61 64 |aceall(s|tory "ad|
|000010d0| 64 72 65 73 73 20 31 22 | 29 20 69 6e 74 6f 20 72 |dress 1"|) into r|
|000010e0| 65 70 6c 61 63 65 43 6f | 75 6e 74 0d 73 65 6c 65 |eplaceCo|unt.sele|
|000010f0| 63 74 20 61 6c 6c 20 74 | 65 78 74 20 69 6e 20 73 |ct all t|ext in s|
|00001100| 74 6f 72 79 20 22 61 64 | 64 72 65 73 73 20 31 22 |tory "ad|dress 1"|
|00001110| 0d 73 65 74 20 53 74 79 | 6c 65 52 65 63 6f 6d 70 |.set Sty|leRecomp|
|00001120| 6f 73 69 74 69 6f 6e 20 | 74 6f 20 66 61 6c 73 65 |osition |to false|
|00001130| 0d 73 65 74 20 74 65 78 | 74 66 6f 6e 74 20 74 6f |.set tex|tfont to|
|00001140| 20 76 50 61 6c 61 74 69 | 6e 6f 0d 73 65 74 20 74 | vPalati|no.set t|
|00001150| 65 78 74 66 61 63 65 20 | 74 6f 20 70 6c 61 69 6e |extface |to plain|
|00001160| 0d 73 65 74 20 74 65 78 | 74 73 69 7a 65 20 74 6f |.set tex|tsize to|
|00001170| 20 31 32 0d 73 65 74 20 | 52 75 6c 65 72 4a 75 73 | 12.set |RulerJus|
|00001180| 74 69 66 69 63 61 74 69 | 6f 6e 20 74 6f 20 63 65 |tificati|on to ce|
|00001190| 6e 74 65 72 0d 73 65 74 | 20 74 65 78 74 66 61 63 |nter.set| textfac|
|000011a0| 65 20 74 6f 20 53 6d 61 | 6c 6c 43 61 70 73 0d 73 |e to Sma|llCaps.s|
|000011b0| 65 74 20 53 74 79 6c 65 | 52 65 63 6f 6d 70 6f 73 |et Style|Recompos|
|000011c0| 69 74 69 6f 6e 20 74 6f | 20 74 72 75 65 0d 69 66 |ition to| true.if|
|000011d0| 20 6e 6f 74 20 73 74 6f | 72 79 66 69 74 73 28 73 | not sto|ryfits(s|
|000011e0| 74 6f 72 79 20 22 61 64 | 64 72 65 73 73 20 31 22 |tory "ad|dress 1"|
|000011f0| 29 20 74 68 65 6e 20 0d | 73 65 74 20 74 65 78 74 |) then .|set text|
|00001200| 66 61 63 65 20 74 6f 20 | 70 6c 61 69 6e 0d 63 6f |face to |plain.co|
|00001210| 70 79 66 69 74 0d 65 6e | 64 20 69 66 0d 0d 0d 2d |pyfit.en|d if...-|
|00001220| 2d 20 62 75 69 6c 64 20 | 6e 61 6d 65 2f 70 6f 73 |- build |name/pos|
|00001230| 69 74 69 6f 6e 20 62 6c | 6f 63 6b 0d 70 75 74 20 |ition bl|ock.put |
|00001240| 65 6d 70 74 79 20 69 6e | 74 6f 20 54 68 65 54 65 |empty in|to TheTe|
|00001250| 78 74 0d 73 65 74 20 69 | 74 65 6d 64 65 6c 20 74 |xt.set i|temdel t|
|00001260| 6f 20 6e 75 6d 74 6f 63 | 68 61 72 28 31 29 0d 67 |o numtoc|har(1).g|
|00001270| 65 74 20 69 74 65 6d 20 | 31 20 6f 66 20 74 68 65 |et item |1 of the|
|00001280| 41 64 64 72 65 73 73 44 | 61 74 61 0d 69 66 20 69 |AddressD|ata.if i|
|00001290| 74 20 ad 20 65 6d 70 74 | 79 20 74 68 65 6e 20 70 |t . empt|y then p|
|000012a0| 75 74 20 69 74 20 69 6e | 74 6f 20 54 68 65 54 65 |ut it in|to TheTe|
|000012b0| 78 74 0d 67 65 74 20 69 | 74 65 6d 20 31 30 20 6f |xt.get i|tem 10 o|
|000012c0| 66 20 74 68 65 41 64 64 | 72 65 73 73 44 61 74 61 |f theAdd|ressData|
|000012d0| 0d 69 66 20 69 74 20 ad | 20 65 6d 70 74 79 20 74 |.if it .| empty t|
|000012e0| 68 65 6e 20 70 75 74 20 | 63 72 26 69 74 20 61 66 |hen put |cr&it af|
|000012f0| 74 65 72 20 54 68 65 54 | 65 78 74 0d 70 75 74 20 |ter TheT|ext.put |
|00001300| 74 68 65 54 65 78 74 20 | 69 6e 74 6f 20 73 74 6f |theText |into sto|
|00001310| 72 79 20 22 70 65 72 73 | 6f 6e 20 31 22 0d 70 75 |ry "pers|on 1".pu|
|00001320| 74 20 72 65 70 6c 61 63 | 65 61 6c 6c 28 73 74 6f |t replac|eall(sto|
|00001330| 72 79 20 22 70 65 72 73 | 6f 6e 20 31 22 29 20 69 |ry "pers|on 1") i|
|00001340| 6e 74 6f 20 72 65 70 6c | 61 63 65 43 6f 75 6e 74 |nto repl|aceCount|
|00001350| 0d 73 65 6c 65 63 74 20 | 61 6c 6c 20 74 65 78 74 |.select |all text|
|00001360| 20 69 6e 20 73 74 6f 72 | 79 20 22 70 65 72 73 6f | in stor|y "perso|
|00001370| 6e 20 31 22 0d 73 65 74 | 20 73 74 79 6c 65 52 65 |n 1".set| styleRe|
|00001380| 63 6f 6d 70 6f 73 69 74 | 69 6f 6e 20 74 6f 20 66 |composit|ion to f|
|00001390| 61 6c 73 65 0d 73 65 74 | 20 74 65 78 74 66 6f 6e |alse.set| textfon|
|000013a0| 74 20 74 6f 20 76 48 65 | 6c 76 65 74 69 63 61 0d |t to vHe|lvetica.|
|000013b0| 73 65 74 20 74 65 78 74 | 73 69 7a 65 20 74 6f 20 |set text|size to |
|000013c0| 31 30 0d 73 65 74 20 74 | 65 78 74 66 61 63 65 20 |10.set t|extface |
|000013d0| 74 6f 20 70 6c 61 69 6e | 0d 73 65 74 20 74 65 78 |to plain|.set tex|
|000013e0| 74 66 61 63 65 20 74 6f | 20 62 6f 6c 64 0d 73 65 |tface to| bold.se|
|000013f0| 74 20 73 74 79 6c 65 52 | 65 63 6f 6d 70 6f 73 69 |t styleR|ecomposi|
|00001400| 74 69 6f 6e 20 74 6f 20 | 74 72 75 65 0d 69 66 20 |tion to |true.if |
|00001410| 69 74 65 6d 20 31 30 20 | 6f 66 20 74 68 65 41 64 |item 10 |of theAd|
|00001420| 64 72 65 73 73 44 61 74 | 61 20 ad 20 65 6d 70 74 |dressDat|a . empt|
|00001430| 79 20 74 68 65 6e 20 0d | 73 65 6c 65 63 74 20 74 |y then .|select t|
|00001440| 65 78 74 20 6c 61 73 74 | 20 6c 69 6e 65 20 6f 66 |ext last| line of|
|00001450| 20 73 74 6f 72 79 20 22 | 70 65 72 73 6f 6e 20 31 | story "|person 1|
|00001460| 22 0d 73 65 74 20 74 65 | 78 74 66 6f 6e 74 20 74 |".set te|xtfont t|
|00001470| 6f 20 76 48 65 6c 76 65 | 74 69 63 61 0d 73 65 74 |o vHelve|tica.set|
|00001480| 20 74 65 78 74 66 61 63 | 65 20 74 6f 20 70 6c 61 | textfac|e to pla|
|00001490| 69 6e 0d 73 65 74 20 74 | 65 78 74 66 61 63 65 20 |in.set t|extface |
|000014a0| 74 6f 20 69 74 61 6c 69 | 63 0d 73 65 74 20 74 65 |to itali|c.set te|
|000014b0| 78 74 73 69 7a 65 20 74 | 6f 20 38 0d 65 6e 64 20 |xtsize t|o 8.end |
|000014c0| 69 66 0d 73 65 6c 65 63 | 74 20 61 6c 6c 20 74 65 |if.selec|t all te|
|000014d0| 78 74 20 69 6e 20 73 74 | 6f 72 79 20 22 70 65 72 |xt in st|ory "per|
|000014e0| 73 6f 6e 20 31 22 0d 73 | 65 74 20 46 6c 65 78 69 |son 1".s|et Flexi|
|000014f0| 62 6c 65 43 68 61 72 53 | 69 7a 65 20 74 6f 20 66 |bleCharS|ize to f|
|00001500| 61 6c 73 65 0d 73 65 74 | 20 52 75 6c 65 72 4a 75 |alse.set| RulerJu|
|00001510| 73 74 69 66 69 63 61 74 | 69 6f 6e 20 74 6f 20 63 |stificat|ion to c|
|00001520| 65 6e 74 65 72 0d 69 66 | 20 6e 6f 74 20 73 74 6f |enter.if| not sto|
|00001530| 72 79 66 69 74 73 28 73 | 74 6f 72 79 20 22 70 65 |ryfits(s|tory "pe|
|00001540| 72 73 6f 6e 20 31 22 29 | 20 74 68 65 6e 20 0d 63 |rson 1")| then .c|
|00001550| 6f 70 79 66 69 74 0d 65 | 6e 64 20 69 66 0d 0d 73 |opyfit.e|nd if..s|
|00001560| 65 6c 65 63 74 20 61 6c | 6c 20 6f 62 6a 65 63 74 |elect al|l object|
|00001570| 73 0d 70 75 74 20 6d 65 | 61 73 75 72 65 6d 65 6e |s.put me|asuremen|
|00001580| 74 73 20 69 6e 74 6f 20 | 6f 6c 64 4d 65 61 73 75 |ts into |oldMeasu|
|00001590| 72 65 6d 65 6e 74 73 0d | 73 65 74 20 6d 65 61 73 |rements.|set meas|
|000015a0| 75 72 65 6d 65 6e 74 73 | 20 74 6f 20 6d 69 6c 6c |urements| to mill|
|000015b0| 69 6d 65 74 65 72 73 0d | 72 65 70 6c 69 63 61 74 |imeters.|replicat|
|000015c0| 65 20 63 75 73 74 6f 6d | 20 31 20 39 36 2e 35 20 |e custom| 1 96.5 |
|000015d0| 31 30 30 20 30 20 31 30 | 30 0d 73 65 6c 65 63 74 |100 0 10|0.select|
|000015e0| 20 61 6c 6c 20 6f 62 6a | 65 63 74 73 0d 72 65 70 | all obj|ects.rep|
|000015f0| 6c 69 63 61 74 65 20 63 | 75 73 74 6f 6d 20 33 20 |licate c|ustom 3 |
|00001600| 30 20 31 30 30 20 35 39 | 20 31 30 30 0d 73 65 74 |0 100 59| 100.set|
|00001610| 20 6d 65 61 73 75 72 65 | 6d 65 6e 74 73 20 74 6f | measure|ments to|
|00001620| 20 6f 6c 64 4d 65 61 73 | 75 72 65 6d 65 6e 74 73 | oldMeas|urements|
|00001630| 0d 73 65 6c 65 63 74 20 | 65 6d 70 74 79 0d 0d 73 |.select |empty..s|
|00001640| 65 74 20 69 74 65 6d 64 | 65 6c 20 74 6f 20 22 2c |et itemd|el to ",|
|00001650| 22 0d 65 6e 64 20 69 66 | 0d 61 6e 73 77 65 72 20 |".end if|.answer |
|00001660| 22 53 65 6c 65 63 74 20 | 22 20 26 20 71 75 6f 74 |"Select |" & quot|
|00001670| 65 20 26 20 22 4c 61 72 | 67 65 72 20 50 72 69 6e |e & "Lar|ger Prin|
|00001680| 74 20 41 72 65 61 22 20 | 26 20 71 75 6f 74 65 20 |t Area" |& quote |
|00001690| 26 20 22 20 66 72 6f 6d | 20 4f 70 74 69 6f 6e 73 |& " from| Options|
|000016a0| c9 22 20 77 69 74 68 20 | 22 4f 4b 22 0d 64 6f 6d |." with |"OK".dom|
|000016b0| 65 6e 75 20 22 50 61 67 | 65 20 53 65 74 75 70 c9 |enu "Pag|e Setup.|
|000016c0| 22 0d 65 6e 64 20 45 6c | 65 67 61 6e 74 0d 0d 0d |".end El|egant...|
|000016d0| 6f 6e 20 4d 6f 64 65 72 | 6e 0d 47 6c 6f 62 61 6c |on Moder|n.Global|
|000016e0| 20 74 68 65 41 64 64 72 | 65 73 73 44 61 74 61 2c | theAddr|essData,|
|000016f0| 20 76 48 65 6c 76 65 74 | 69 63 61 0d 47 6c 6f 62 | vHelvet|ica.Glob|
|00001700| 61 6c 20 44 6f 63 75 6d | 65 6e 74 4b 69 6e 64 0d |al Docum|entKind.|
|00001710| 0d 69 66 20 44 6f 63 75 | 6d 65 6e 74 4b 69 6e 64 |.if Docu|mentKind|
|00001720| 20 ad 20 22 42 75 73 69 | 6e 65 73 73 20 43 61 72 | . "Busi|ness Car|
|00001730| 64 22 20 74 68 65 6e 0d | 73 65 74 20 69 74 65 6d |d" then.|set item|
|00001740| 64 65 6c 20 74 6f 20 6e | 75 6d 74 6f 63 68 61 72 |del to n|umtochar|
|00001750| 28 31 29 0d 70 75 74 20 | 31 20 69 6e 74 6f 20 6c |(1).put |1 into l|
|00001760| 69 6e 65 63 6f 75 6e 74 | 0d 72 65 70 65 61 74 20 |inecount|.repeat |
|00001770| 77 69 74 68 20 78 20 3d | 20 31 20 74 6f 20 31 32 |with x =| 1 to 12|
|00001780| 0d 67 65 74 20 69 74 65 | 6d 20 78 20 6f 66 20 74 |.get ite|m x of t|
|00001790| 68 65 41 64 64 72 65 73 | 73 44 61 74 61 0d 69 66 |heAddres|sData.if|
|000017a0| 20 69 74 20 ad 20 65 6d | 70 74 79 20 74 68 65 6e | it . em|pty then|
|000017b0| 0d 70 75 74 20 69 74 20 | 69 6e 74 6f 20 6c 69 6e |.put it |into lin|
|000017c0| 65 20 6c 69 6e 65 63 6f | 75 6e 74 20 6f 66 20 54 |e lineco|unt of T|
|000017d0| 68 65 54 65 78 74 0d 61 | 64 64 20 31 20 74 6f 20 |heText.a|dd 1 to |
|000017e0| 6c 69 6e 65 63 6f 75 6e | 74 0d 65 6e 64 20 69 66 |linecoun|t.end if|
|000017f0| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 73 65 74 20 |.end rep|eat.set |
|00001800| 69 74 65 6d 64 65 6c 20 | 74 6f 20 22 2c 22 0d 70 |itemdel |to ",".p|
|00001810| 75 74 20 54 68 65 54 65 | 78 74 20 69 6e 74 6f 20 |ut TheTe|xt into |
|00001820| 73 74 6f 72 79 20 22 41 | 64 64 72 65 73 73 22 0d |story "A|ddress".|
|00001830| 73 65 6c 65 63 74 20 61 | 6c 6c 20 74 65 78 74 20 |select a|ll text |
|00001840| 69 6e 20 73 74 6f 72 79 | 20 22 61 64 64 72 65 73 |in story| "addres|
|00001850| 73 22 0d 73 65 74 20 53 | 74 79 6c 65 52 65 63 6f |s".set S|tyleReco|
|00001860| 6d 70 6f 73 69 74 69 6f | 6e 20 74 6f 20 66 61 6c |mpositio|n to fal|
|00001870| 73 65 0d 73 65 74 20 74 | 65 78 74 66 6f 6e 74 20 |se.set t|extfont |
|00001880| 74 6f 20 76 48 65 6c 76 | 65 74 69 63 61 0d 73 65 |to vHelv|etica.se|
|00001890| 74 20 74 65 78 74 66 61 | 63 65 20 74 6f 20 70 6c |t textfa|ce to pl|
|000018a0| 61 69 6e 0d 73 65 74 20 | 74 65 78 74 73 69 7a 65 |ain.set |textsize|
|000018b0| 20 74 6f 20 31 30 0d 73 | 65 74 20 52 75 6c 65 72 | to 10.s|et Ruler|
|000018c0| 4a 75 73 74 69 66 69 63 | 61 74 69 6f 6e 20 74 6f |Justific|ation to|
|000018d0| 20 72 69 67 68 74 0d 73 | 65 74 20 46 6c 65 78 69 | right.s|et Flexi|
|000018e0| 62 6c 65 43 68 61 72 53 | 69 7a 65 20 74 6f 20 66 |bleCharS|ize to f|
|000018f0| 61 6c 73 65 0d 73 65 74 | 20 53 74 79 6c 65 52 65 |alse.set| StyleRe|
|00001900| 63 6f 6d 70 6f 73 69 74 | 69 6f 6e 20 74 6f 20 74 |composit|ion to t|
|00001910| 72 75 65 0d 63 6f 70 79 | 66 69 74 0d 65 6c 73 65 |rue.copy|fit.else|
|00001920| 20 2d 2d 20 74 69 6d 65 | 20 74 6f 20 6d 61 6b 65 | -- time| to make|
|00001930| 20 73 6f 6d 65 20 63 61 | 72 64 73 0d 0d 70 75 74 | some ca|rds..put|
|00001940| 20 65 6d 70 74 79 20 69 | 6e 74 6f 20 54 68 65 54 | empty i|nto TheT|
|00001950| 65 78 74 0d 73 65 74 20 | 69 74 65 6d 64 65 6c 20 |ext.set |itemdel |
|00001960| 74 6f 20 6e 75 6d 74 6f | 63 68 61 72 28 31 29 0d |to numto|char(1).|
|00001970| 70 75 74 20 31 20 69 6e | 74 6f 20 6c 69 6e 65 63 |put 1 in|to linec|
|00001980| 6f 75 6e 74 0d 72 65 70 | 65 61 74 20 77 69 74 68 |ount.rep|eat with|
|00001990| 20 78 20 3d 20 20 32 20 | 74 6f 20 36 20 2d 2d 32 | x = 2 |to 6 --2|
|000019a0| 20 74 6f 20 36 0d 67 65 | 74 20 69 74 65 6d 20 78 | to 6.ge|t item x|
|000019b0| 20 6f 66 20 74 68 65 41 | 64 64 72 65 73 73 44 61 | of theA|ddressDa|
|000019c0| 74 61 0d 69 66 20 69 74 | 20 ad 20 65 6d 70 74 79 |ta.if it| . empty|
|000019d0| 20 74 68 65 6e 0d 70 75 | 74 20 69 74 20 69 6e 74 | then.pu|t it int|
|000019e0| 6f 20 6c 69 6e 65 20 6c | 69 6e 65 63 6f 75 6e 74 |o line l|inecount|
|000019f0| 20 6f 66 20 54 68 65 54 | 65 78 74 0d 61 64 64 20 | of TheT|ext.add |
|00001a00| 31 20 74 6f 20 6c 69 6e | 65 63 6f 75 6e 74 0d 65 |1 to lin|ecount.e|
|00001a10| 6e 64 20 69 66 0d 65 6e | 64 20 72 65 70 65 61 74 |nd if.en|d repeat|
|00001a20| 0d 70 75 74 20 54 68 65 | 54 65 78 74 20 69 6e 74 |.put The|Text int|
|00001a30| 6f 20 73 74 6f 72 79 20 | 22 61 64 64 72 65 73 73 |o story |"address|
|00001a40| 20 31 22 0d 73 65 6c 65 | 63 74 20 61 6c 6c 20 74 | 1".sele|ct all t|
|00001a50| 65 78 74 20 69 6e 20 73 | 74 6f 72 79 20 22 61 64 |ext in s|tory "ad|
|00001a60| 64 72 65 73 73 20 31 22 | 0d 73 65 74 20 53 74 79 |dress 1"|.set Sty|
|00001a70| 6c 65 52 65 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 20 |leRecomp|osition |
|00001a80| 74 6f 20 66 61 6c 73 65 | 0d 73 65 74 20 74 65 78 |to false|.set tex|
|00001a90| 74 66 6f 6e 74 20 74 6f | 20 76 48 65 6c 76 65 74 |tfont to| vHelvet|
|00001aa0| 69 63 61 0d 73 65 74 20 | 74 65 78 74 66 61 63 65 |ica.set |textface|
|00001ab0| 20 74 6f 20 70 6c 61 69 | 6e 0d 73 65 74 20 74 65 | to plai|n.set te|
|00001ac0| 78 74 73 69 7a 65 20 74 | 6f 20 31 30 0d 73 65 74 |xtsize t|o 10.set|
|00001ad0| 20 52 75 6c 65 72 4a 75 | 73 74 69 66 69 63 61 74 | RulerJu|stificat|
|00001ae0| 69 6f 6e 20 74 6f 20 72 | 69 67 68 74 0d 73 65 74 |ion to r|ight.set|
|00001af0| 20 53 74 79 6c 65 52 65 | 63 6f 6d 70 6f 73 69 74 | StyleRe|composit|
|00001b00| 69 6f 6e 20 74 6f 20 74 | 72 75 65 0d 63 6f 70 79 |ion to t|rue.copy|
|00001b10| 66 69 74 0d 0d 2d 2d 20 | 62 75 69 6c 64 20 6e 61 |fit..-- |build na|
|00001b20| 6d 65 2f 70 6f 73 69 74 | 69 6f 6e 20 62 6c 6f 63 |me/posit|ion bloc|
|00001b30| 6b 0d 70 75 74 20 65 6d | 70 74 79 20 69 6e 74 6f |k.put em|pty into|
|00001b40| 20 54 68 65 54 65 78 74 | 0d 67 65 74 20 69 74 65 | TheText|.get ite|
|00001b50| 6d 20 31 20 6f 66 20 74 | 68 65 41 64 64 72 65 73 |m 1 of t|heAddres|
|00001b60| 73 44 61 74 61 0d 69 66 | 20 69 74 20 ad 20 65 6d |sData.if| it . em|
|00001b70| 70 74 79 20 74 68 65 6e | 0d 70 75 74 20 69 74 20 |pty then|.put it |
|00001b80| 69 6e 74 6f 20 73 74 6f | 72 79 20 22 70 65 72 73 |into sto|ry "pers|
|00001b90| 6f 6e 20 31 22 0d 73 65 | 6c 65 63 74 20 61 6c 6c |on 1".se|lect all|
|00001ba0| 20 74 65 78 74 20 69 6e | 20 73 74 6f 72 79 20 22 | text in| story "|
|00001bb0| 70 65 72 73 6f 6e 20 31 | 22 0d 73 65 74 20 74 65 |person 1|".set te|
|00001bc0| 78 74 66 6f 6e 74 20 74 | 6f 20 76 48 65 6c 76 65 |xtfont t|o vHelve|
|00001bd0| 74 69 63 61 0d 73 65 74 | 20 74 65 78 74 66 61 63 |tica.set| textfac|
|00001be0| 65 20 74 6f 20 70 6c 61 | 69 6e 0d 73 65 74 20 74 |e to pla|in.set t|
|00001bf0| 65 78 74 66 61 63 65 20 | 74 6f 20 62 6f 6c 64 0d |extface |to bold.|
|00001c00| 65 6e 64 20 69 66 0d 67 | 65 74 20 69 74 65 6d 20 |end if.g|et item |
|00001c10| 31 30 20 6f 66 20 74 68 | 65 41 64 64 72 65 73 73 |10 of th|eAddress|
|00001c20| 44 61 74 61 0d 69 66 20 | 69 74 20 ad 20 65 6d 70 |Data.if |it . emp|
|00001c30| 74 79 20 74 68 65 6e 0d | 70 75 74 20 63 72 26 69 |ty then.|put cr&i|
|00001c40| 74 20 61 66 74 65 72 20 | 73 74 6f 72 79 20 22 70 |t after |story "p|
|00001c50| 65 72 73 6f 6e 20 31 22 | 0d 73 65 6c 65 63 74 20 |erson 1"|.select |
|00001c60| 74 65 78 74 20 6c 61 73 | 74 20 6c 69 6e 65 20 6f |text las|t line o|
|00001c70| 66 20 73 74 6f 72 79 20 | 22 70 65 72 73 6f 6e 20 |f story |"person |
|00001c80| 31 22 0d 73 65 74 20 74 | 65 78 74 66 6f 6e 74 20 |1".set t|extfont |
|00001c90| 74 6f 20 76 48 65 6c 76 | 65 74 69 63 61 0d 73 65 |to vHelv|etica.se|
|00001ca0| 74 20 74 65 78 74 66 61 | 63 65 20 74 6f 20 70 6c |t textfa|ce to pl|
|00001cb0| 61 69 6e 0d 73 65 74 20 | 74 65 78 74 66 61 63 65 |ain.set |textface|
|00001cc0| 20 74 6f 20 69 74 61 6c | 69 63 0d 65 6e 64 20 69 | to ital|ic.end i|
|00001cd0| 66 0d 0d 73 65 6c 65 63 | 74 20 61 6c 6c 20 74 65 |f..selec|t all te|
|00001ce0| 78 74 20 69 6e 20 73 74 | 6f 72 79 20 22 70 65 72 |xt in st|ory "per|
|00001cf0| 73 6f 6e 20 31 22 0d 73 | 65 74 20 46 6c 65 78 69 |son 1".s|et Flexi|
|00001d00| 62 6c 65 43 68 61 72 53 | 69 7a 65 20 74 6f 20 66 |bleCharS|ize to f|
|00001d10| 61 6c 73 65 0d 63 6f 70 | 79 66 69 74 20 0d 0d 2d |alse.cop|yfit ..-|
|00001d20| 2d 20 62 75 69 6c 64 20 | 70 68 6f 6e 65 20 62 6c |- build |phone bl|
|00001d30| 6f 63 6b 0d 70 75 74 20 | 65 6d 70 74 79 20 69 6e |ock.put |empty in|
|00001d40| 74 6f 20 74 68 65 54 65 | 78 74 0d 70 75 74 20 31 |to theTe|xt.put 1|
|00001d50| 20 69 6e 74 6f 20 6c 69 | 6e 65 63 6f 75 6e 74 0d | into li|necount.|
|00001d60| 72 65 70 65 61 74 20 77 | 69 74 68 20 78 20 3d 20 |repeat w|ith x = |
|00001d70| 20 37 20 74 6f 20 31 32 | 20 2d 2d 37 20 74 6f 20 | 7 to 12| --7 to |
|00001d80| 31 32 0d 69 66 20 78 20 | ad 20 31 30 20 74 68 65 |12.if x |. 10 the|
|00001d90| 6e 0d 67 65 74 20 69 74 | 65 6d 20 78 20 6f 66 20 |n.get it|em x of |
|00001da0| 74 68 65 41 64 64 72 65 | 73 73 44 61 74 61 0d 69 |theAddre|ssData.i|
|00001db0| 66 20 69 74 20 ad 20 65 | 6d 70 74 79 20 74 68 65 |f it . e|mpty the|
|00001dc0| 6e 0d 70 75 74 20 69 74 | 20 69 6e 74 6f 20 6c 69 |n.put it| into li|
|00001dd0| 6e 65 20 6c 69 6e 65 63 | 6f 75 6e 74 20 6f 66 20 |ne linec|ount of |
|00001de0| 54 68 65 54 65 78 74 0d | 61 64 64 20 31 20 74 6f |TheText.|add 1 to|
|00001df0| 20 6c 69 6e 65 63 6f 75 | 6e 74 0d 65 6e 64 20 69 | linecou|nt.end i|
|00001e00| 66 0d 65 6e 64 20 69 66 | 0d 65 6e 64 20 72 65 70 |f.end if|.end rep|
|00001e10| 65 61 74 0d 70 75 74 20 | 54 68 65 54 65 78 74 20 |eat.put |TheText |
|00001e20| 69 6e 74 6f 20 73 74 6f | 72 79 20 22 70 68 6f 6e |into sto|ry "phon|
|00001e30| 65 66 61 78 74 65 6c 65 | 78 20 31 22 0d 73 65 6c |efaxtele|x 1".sel|
|00001e40| 65 63 74 20 61 6c 6c 20 | 74 65 78 74 20 69 6e 20 |ect all |text in |
|00001e50| 73 74 6f 72 79 20 22 70 | 68 6f 6e 65 66 61 78 74 |story "p|honefaxt|
|00001e60| 65 6c 65 78 20 31 22 0d | 73 65 74 20 53 74 79 6c |elex 1".|set Styl|
|00001e70| 65 52 65 63 6f 6d 70 6f | 73 69 74 69 6f 6e 20 74 |eRecompo|sition t|
|00001e80| 6f 20 66 61 6c 73 65 0d | 73 65 74 20 74 65 78 74 |o false.|set text|
|00001e90| 66 6f 6e 74 20 74 6f 20 | 76 48 65 6c 76 65 74 69 |font to |vHelveti|
|00001ea0| 63 61 0d 73 65 74 20 74 | 65 78 74 66 61 63 65 20 |ca.set t|extface |
|00001eb0| 74 6f 20 70 6c 61 69 6e | 0d 73 65 74 20 74 65 78 |to plain|.set tex|
|00001ec0| 74 73 69 7a 65 20 74 6f | 20 31 30 0d 73 65 74 20 |tsize to| 10.set |
|00001ed0| 52 75 6c 65 72 4a 75 73 | 74 69 66 69 63 61 74 69 |RulerJus|tificati|
|00001ee0| 6f 6e 20 74 6f 20 72 69 | 67 68 74 0d 73 65 74 20 |on to ri|ght.set |
|00001ef0| 53 74 79 6c 65 52 65 63 | 6f 6d 70 6f 73 69 74 69 |StyleRec|ompositi|
|00001f00| 6f 6e 20 74 6f 20 74 72 | 75 65 0d 73 65 74 20 46 |on to tr|ue.set F|
|00001f10| 6c 65 78 69 62 6c 65 43 | 68 61 72 53 69 7a 65 20 |lexibleC|harSize |
|00001f20| 74 6f 20 66 61 6c 73 65 | 0d 63 6f 70 79 66 69 74 |to false|.copyfit|
|00001f30| 20 0d 73 65 74 20 69 74 | 65 6d 64 65 6c 20 74 6f | .set it|emdel to|
|00001f40| 20 22 2c 22 0d 0d 73 65 | 6c 65 63 74 20 61 6c 6c | ","..se|lect all|
|00001f50| 20 6f 62 6a 65 63 74 73 | 0d 70 75 74 20 6d 65 61 | objects|.put mea|
|00001f60| 73 75 72 65 6d 65 6e 74 | 73 20 69 6e 74 6f 20 6f |surement|s into o|
|00001f70| 6c 64 4d 65 61 73 75 72 | 65 6d 65 6e 74 73 0d 73 |ldMeasur|ements.s|
|00001f80| 65 74 20 6d 65 61 73 75 | 72 65 6d 65 6e 74 73 20 |et measu|rements |
|00001f90| 74 6f 20 6d 69 6c 6c 69 | 6d 65 74 65 72 73 0d 72 |to milli|meters.r|
|00001fa0| 65 70 6c 69 63 61 74 65 | 20 63 75 73 74 6f 6d 20 |eplicate| custom |
|00001fb0| 31 20 39 35 20 31 30 30 | 20 30 20 31 30 30 0d 73 |1 95 100| 0 100.s|
|00001fc0| 65 6c 65 63 74 20 61 6c | 6c 20 6f 62 6a 65 63 74 |elect al|l object|
|00001fd0| 73 0d 72 65 70 6c 69 63 | 61 74 65 20 63 75 73 74 |s.replic|ate cust|
|00001fe0| 6f 6d 20 33 20 30 20 31 | 30 30 20 35 38 20 31 30 |om 3 0 1|00 58 10|
|00001ff0| 30 0d 73 65 74 20 6d 65 | 61 73 75 72 65 6d 65 6e |0.set me|asuremen|
|00002000| 74 73 20 74 6f 20 6f 6c | 64 4d 65 61 73 75 72 65 |ts to ol|dMeasure|
|00002010| 6d 65 6e 74 73 0d 73 65 | 6c 65 63 74 20 65 6d 70 |ments.se|lect emp|
|00002020| 74 79 0d 61 6e 73 77 65 | 72 20 22 53 65 6c 65 63 |ty.answe|r "Selec|
|00002030| 74 20 22 20 26 20 71 75 | 6f 74 65 20 26 20 22 4c |t " & qu|ote & "L|
|00002040| 61 72 67 65 72 20 50 72 | 69 6e 74 20 41 72 65 61 |arger Pr|int Area|
|00002050| 22 20 26 20 71 75 6f 74 | 65 20 26 20 22 20 66 72 |" & quot|e & " fr|
|00002060| 6f 6d 20 4f 70 74 69 6f | 6e 73 c9 22 20 77 69 74 |om Optio|ns." wit|
|00002070| 68 20 22 4f 4b 22 0d 64 | 6f 6d 65 6e 75 20 22 50 |h "OK".d|omenu "P|
|00002080| 61 67 65 20 53 65 74 75 | 70 c9 22 0d 65 6e 64 20 |age Setu|p.".end |
|00002090| 69 66 0d 65 6e 64 20 4d | 6f 64 65 72 6e 0d 0d 6f |if.end M|odern..o|
|000020a0| 6e 20 4e 65 77 57 61 76 | 65 0d 47 6c 6f 62 61 6c |n NewWav|e.Global|
|000020b0| 20 74 68 65 41 64 64 72 | 65 73 73 44 61 74 61 2c | theAddr|essData,|
|000020c0| 20 76 48 65 6c 76 65 74 | 69 63 61 0d 47 6c 6f 62 | vHelvet|ica.Glob|
|000020d0| 61 6c 20 44 6f 63 75 6d | 65 6e 74 4b 69 6e 64 0d |al Docum|entKind.|
|000020e0| 0d 69 66 20 44 6f 63 75 | 6d 65 6e 74 4b 69 6e 64 |.if Docu|mentKind|
|000020f0| 20 ad 20 22 42 75 73 69 | 6e 65 73 73 20 43 61 72 | . "Busi|ness Car|
|00002100| 64 22 20 74 68 65 6e 0d | 73 65 74 20 69 74 65 6d |d" then.|set item|
|00002110| 64 65 6c 20 74 6f 20 6e | 75 6d 74 6f 63 68 61 72 |del to n|umtochar|
|00002120| 28 31 29 0d 70 75 74 20 | 31 20 69 6e 74 6f 20 6c |(1).put |1 into l|
|00002130| 69 6e 65 63 6f 75 6e 74 | 0d 72 65 70 65 61 74 20 |inecount|.repeat |
|00002140| 77 69 74 68 20 78 20 3d | 20 20 31 20 74 6f 20 31 |with x =| 1 to 1|
|00002150| 32 20 2d 2d 32 20 74 6f | 20 38 0d 67 65 74 20 69 |2 --2 to| 8.get i|
|00002160| 74 65 6d 20 78 20 6f 66 | 20 74 68 65 41 64 64 72 |tem x of| theAddr|
|00002170| 65 73 73 44 61 74 61 0d | 69 66 20 69 74 20 ad 20 |essData.|if it . |
|00002180| 65 6d 70 74 79 20 74 68 | 65 6e 0d 70 75 74 20 69 |empty th|en.put i|
|00002190| 74 20 69 6e 74 6f 20 6c | 69 6e 65 20 6c 69 6e 65 |t into l|ine line|
|000021a0| 63 6f 75 6e 74 20 6f 66 | 20 54 68 65 54 65 78 74 |count of| TheText|
|000021b0| 0d 61 64 64 20 31 20 74 | 6f 20 6c 69 6e 65 63 6f |.add 1 t|o lineco|
|000021c0| 75 6e 74 0d 65 6e 64 20 | 69 66 0d 65 6e 64 20 72 |unt.end |if.end r|
|000021d0| 65 70 65 61 74 0d 73 65 | 74 20 69 74 65 6d 64 65 |epeat.se|t itemde|
|000021e0| 6c 20 74 6f 20 22 2c 22 | 0d 70 75 74 20 54 68 65 |l to ","|.put The|
|000021f0| 54 65 78 74 20 69 6e 74 | 6f 20 73 74 6f 72 79 20 |Text int|o story |
|00002200| 22 41 64 64 72 65 73 73 | 22 0d 73 65 6c 65 63 74 |"Address|".select|
|00002210| 20 61 6c 6c 20 74 65 78 | 74 20 69 6e 20 73 74 6f | all tex|t in sto|
|00002220| 72 79 20 22 61 64 64 72 | 65 73 73 22 0d 73 65 74 |ry "addr|ess".set|
|00002230| 20 53 74 79 6c 65 52 65 | 63 6f 6d 70 6f 73 69 74 | StyleRe|composit|
|00002240| 69 6f 6e 20 74 6f 20 66 | 61 6c 73 65 0d 73 65 74 |ion to f|alse.set|
|00002250| 20 74 65 78 74 66 6f 6e | 74 20 74 6f 20 76 48 65 | textfon|t to vHe|
|00002260| 6c 76 65 74 69 63 61 0d | 73 65 74 20 74 65 78 74 |lvetica.|set text|
|00002270| 66 61 63 65 20 74 6f 20 | 70 6c 61 69 6e 0d 73 65 |face to |plain.se|
|00002280| 74 20 74 65 78 74 66 61 | 63 65 20 74 6f 20 69 74 |t textfa|ce to it|
|00002290| 61 6c 69 63 0d 73 65 74 | 20 74 65 78 74 73 69 7a |alic.set| textsiz|
|000022a0| 65 20 74 6f 20 31 30 0d | 73 65 74 20 52 75 6c 65 |e to 10.|set Rule|
|000022b0| 72 4a 75 73 74 69 66 69 | 63 61 74 69 6f 6e 20 74 |rJustifi|cation t|
|000022c0| 6f 20 6c 65 66 74 0d 73 | 65 74 20 46 6c 65 78 69 |o left.s|et Flexi|
|000022d0| 62 6c 65 43 68 61 72 53 | 69 7a 65 20 74 6f 20 66 |bleCharS|ize to f|
|000022e0| 61 6c 73 65 0d 73 65 74 | 20 53 74 79 6c 65 52 65 |alse.set| StyleRe|
|000022f0| 63 6f 6d 70 6f 73 69 74 | 69 6f 6e 20 74 6f 20 74 |composit|ion to t|
|00002300| 72 75 65 0d 63 6f 70 79 | 66 69 74 0d 0d 65 6c 73 |rue.copy|fit..els|
|00002310| 65 0d 0d 2d 2d 20 73 74 | 61 72 74 20 77 69 74 68 |e..-- st|art with|
|00002320| 20 61 20 63 6c 65 61 6e | 20 73 6c 61 74 65 0d 73 | a clean| slate.s|
|00002330| 65 6c 65 63 74 20 65 6d | 70 74 79 0d 2d 2d 20 20 |elect em|pty.-- |
|00002340| 20 20 73 65 6c 65 63 74 | 20 6f 62 6a 65 63 74 73 | select| objects|
|00002350| 20 77 68 65 72 65 20 74 | 68 65 20 6e 75 6d 62 65 | where t|he numbe|
|00002360| 72 20 6f 66 20 74 68 69 | 73 20 6f 62 6a 65 63 74 |r of thi|s object|
|00002370| 20 3e 20 31 31 0d 2d 2d | 20 20 20 20 63 6c 65 61 | > 11.--| clea|
|00002380| 72 0d 0d 2d 2d 20 62 75 | 69 6c 64 20 74 68 65 20 |r..-- bu|ild the |
|00002390| 74 65 78 74 0d 73 65 74 | 20 69 74 65 6d 64 65 6c |text.set| itemdel|
|000023a0| 20 74 6f 20 6e 75 6d 74 | 6f 63 68 61 72 28 31 29 | to numt|ochar(1)|
|000023b0| 0d 70 75 74 20 31 20 69 | 6e 74 6f 20 6c 69 6e 65 |.put 1 i|nto line|
|000023c0| 63 6f 75 6e 74 0d 72 65 | 70 65 61 74 20 77 69 74 |count.re|peat wit|
|000023d0| 68 20 78 20 3d 20 20 32 | 20 74 6f 20 31 32 20 2d |h x = 2| to 12 -|
|000023e0| 2d 32 20 74 6f 20 31 32 | 0d 69 66 20 78 20 ad 20 |-2 to 12|.if x . |
|000023f0| 31 30 20 74 68 65 6e 0d | 67 65 74 20 69 74 65 6d |10 then.|get item|
|00002400| 20 78 20 6f 66 20 74 68 | 65 41 64 64 72 65 73 73 | x of th|eAddress|
|00002410| 44 61 74 61 0d 69 66 20 | 69 74 20 ad 20 65 6d 70 |Data.if |it . emp|
|00002420| 74 79 20 74 68 65 6e 0d | 70 75 74 20 69 74 20 69 |ty then.|put it i|
|00002430| 6e 74 6f 20 6c 69 6e 65 | 20 6c 69 6e 65 63 6f 75 |nto line| linecou|
|00002440| 6e 74 20 6f 66 20 54 68 | 65 54 65 78 74 0d 61 64 |nt of Th|eText.ad|
|00002450| 64 20 31 20 74 6f 20 6c | 69 6e 65 63 6f 75 6e 74 |d 1 to l|inecount|
|00002460| 0d 65 6e 64 20 69 66 0d | 65 6e 64 20 69 66 0d 65 |.end if.|end if.e|
|00002470| 6e 64 20 72 65 70 65 61 | 74 0d 0d 61 64 64 20 31 |nd repea|t..add 1|
|00002480| 20 74 6f 20 6c 69 6e 65 | 63 6f 75 6e 74 0d 0d 67 | to line|count..g|
|00002490| 65 74 20 69 74 65 6d 20 | 31 20 6f 66 20 74 68 65 |et item |1 of the|
|000024a0| 41 64 64 72 65 73 73 44 | 61 74 61 0d 69 66 20 69 |AddressD|ata.if i|
|000024b0| 74 20 ad 20 65 6d 70 74 | 79 20 74 68 65 6e 0d 70 |t . empt|y then.p|
|000024c0| 75 74 20 69 74 20 69 6e | 74 6f 20 6c 69 6e 65 20 |ut it in|to line |
|000024d0| 6c 69 6e 65 63 6f 75 6e | 74 20 6f 66 20 54 68 65 |linecoun|t of The|
|000024e0| 54 65 78 74 0d 70 75 74 | 20 6c 69 6e 65 63 6f 75 |Text.put| linecou|
|000024f0| 6e 74 20 69 6e 74 6f 20 | 6e 61 6d 65 6c 69 6e 65 |nt into |nameline|
|00002500| 0d 61 64 64 20 31 20 74 | 6f 20 6c 69 6e 65 63 6f |.add 1 t|o lineco|
|00002510| 75 6e 74 0d 65 6e 64 20 | 69 66 0d 67 65 74 20 69 |unt.end |if.get i|
|00002520| 74 65 6d 20 31 30 20 6f | 66 20 74 68 65 41 64 64 |tem 10 o|f theAdd|
|00002530| 72 65 73 73 44 61 74 61 | 0d 69 66 20 69 74 20 ad |ressData|.if it .|
|00002540| 20 65 6d 70 74 79 20 74 | 68 65 6e 20 70 75 74 20 | empty t|hen put |
|00002550| 69 74 20 69 6e 74 6f 20 | 6c 69 6e 65 20 6c 69 6e |it into |line lin|
|00002560| 65 63 6f 75 6e 74 20 6f | 66 20 54 68 65 54 65 78 |ecount o|f TheTex|
|00002570| 74 0d 0d 2d 2d 20 44 6f | 20 63 61 72 64 73 27 20 |t..-- Do| cards' |
|00002580| 54 65 78 74 0d 0d 70 75 | 74 20 54 68 65 54 65 78 |Text..pu|t TheTex|
|00002590| 74 20 69 6e 74 6f 20 73 | 74 6f 72 79 20 22 41 64 |t into s|tory "Ad|
|000025a0| 64 72 65 73 73 20 31 22 | 0d 73 65 6c 65 63 74 20 |dress 1"|.select |
|000025b0| 61 6c 6c 20 74 65 78 74 | 20 69 6e 20 73 74 6f 72 |all text| in stor|
|000025c0| 79 20 22 41 64 64 72 65 | 73 73 20 31 22 0d 0d 73 |y "Addre|ss 1"..s|
|000025d0| 65 74 20 53 74 79 6c 65 | 52 65 63 6f 6d 70 6f 73 |et Style|Recompos|
|000025e0| 69 74 69 6f 6e 20 74 6f | 20 66 61 6c 73 65 0d 73 |ition to| false.s|
|000025f0| 65 74 20 74 65 78 74 66 | 6f 6e 74 20 74 6f 20 76 |et textf|ont to v|
|00002600| 48 65 6c 76 65 74 69 63 | 61 0d 73 65 74 20 74 65 |Helvetic|a.set te|
|00002610| 78 74 66 61 63 65 20 74 | 6f 20 70 6c 61 69 6e 0d |xtface t|o plain.|
|00002620| 73 65 74 20 74 65 78 74 | 66 61 63 65 20 74 6f 20 |set text|face to |
|00002630| 69 74 61 6c 69 63 0d 73 | 65 74 20 74 65 78 74 73 |italic.s|et texts|
|00002640| 69 7a 65 20 74 6f 20 31 | 30 0d 73 65 74 20 52 75 |ize to 1|0.set Ru|
|00002650| 6c 65 72 4a 75 73 74 69 | 66 69 63 61 74 69 6f 6e |lerJusti|fication|
|00002660| 20 74 6f 20 6c 65 66 74 | 0d 73 65 74 20 46 6c 65 | to left|.set Fle|
|00002670| 78 69 62 6c 65 43 68 61 | 72 53 69 7a 65 20 74 6f |xibleCha|rSize to|
|00002680| 20 66 61 6c 73 65 0d 69 | 66 20 65 78 69 73 74 73 | false.i|f exists|
|00002690| 28 6e 61 6d 65 6c 69 6e | 65 29 20 74 68 65 6e 0d |(namelin|e) then.|
|000026a0| 73 65 6c 65 63 74 20 74 | 65 78 74 20 6c 69 6e 65 |select t|ext line|
|000026b0| 20 6e 61 6d 65 6c 69 6e | 65 20 6f 66 20 73 74 6f | namelin|e of sto|
|000026c0| 72 79 20 22 41 64 64 72 | 65 73 73 20 31 22 0d 73 |ry "Addr|ess 1".s|
|000026d0| 65 74 20 74 65 78 74 66 | 61 63 65 20 74 6f 20 62 |et textf|ace to b|
|000026e0| 6f 6c 64 0d 65 6e 64 20 | 69 66 0d 73 65 74 20 53 |old.end |if.set S|
|000026f0| 74 79 6c 65 52 65 63 6f | 6d 70 6f 73 69 74 69 6f |tyleReco|mpositio|
|00002700| 6e 20 74 6f 20 74 72 75 | 65 0d 63 6f 70 79 66 69 |n to tru|e.copyfi|
|00002710| 74 0d 0d 73 65 74 20 69 | 74 65 6d 64 65 6c 20 74 |t..set i|temdel t|
|00002720| 6f 20 22 2c 22 0d 0d 73 | 65 6c 65 63 74 20 61 6c |o ","..s|elect al|
|00002730| 6c 20 6f 62 6a 65 63 74 | 73 0d 72 65 70 6c 69 63 |l object|s.replic|
|00002740| 61 74 65 20 63 75 73 74 | 6f 6d 20 31 20 32 37 36 |ate cust|om 1 276|
|00002750| 20 31 30 30 20 30 20 31 | 30 30 0d 73 65 6c 65 63 | 100 0 1|00.selec|
|00002760| 74 20 61 6c 6c 20 6f 62 | 6a 65 63 74 73 0d 72 65 |t all ob|jects.re|
|00002770| 70 6c 69 63 61 74 65 20 | 63 75 73 74 6f 6d 20 33 |plicate |custom 3|
|00002780| 20 30 20 31 30 30 20 31 | 36 34 20 31 30 30 0d 73 | 0 100 1|64 100.s|
|00002790| 65 6c 65 63 74 20 65 6d | 70 74 79 0d 61 6e 73 77 |elect em|pty.answ|
|000027a0| 65 72 20 22 53 65 6c 65 | 63 74 20 22 20 26 20 71 |er "Sele|ct " & q|
|000027b0| 75 6f 74 65 20 26 20 22 | 4c 61 72 67 65 72 20 50 |uote & "|Larger P|
|000027c0| 72 69 6e 74 20 41 72 65 | 61 22 20 26 20 71 75 6f |rint Are|a" & quo|
|000027d0| 74 65 20 26 20 22 20 66 | 72 6f 6d 20 4f 70 74 69 |te & " f|rom Opti|
|000027e0| 6f 6e 73 c9 22 20 77 69 | 74 68 20 22 4f 4b 22 0d |ons." wi|th "OK".|
|000027f0| 64 6f 6d 65 6e 75 20 22 | 50 61 67 65 20 53 65 74 |domenu "|Page Set|
|00002800| 75 70 c9 22 0d 65 6e 64 | 20 69 66 0d 0d 65 6e 64 |up.".end| if..end|
|00002810| 20 4e 65 77 57 61 76 65 | 0d 0d 6f 6e 20 50 65 72 | NewWave|..on Per|
|00002820| 73 6f 6e 61 6c 20 0d 47 | 6c 6f 62 61 6c 20 74 68 |sonal .G|lobal th|
|00002830| 65 41 64 64 72 65 73 73 | 44 61 74 61 2c 20 76 48 |eAddress|Data, vH|
|00002840| 65 6c 76 65 74 69 63 61 | 0d 0d 0d 73 65 74 20 69 |elvetica|...set i|
|00002850| 74 65 6d 64 65 6c 20 74 | 6f 20 6e 75 6d 74 6f 63 |temdel t|o numtoc|
|00002860| 68 61 72 28 31 29 0d 70 | 75 74 20 31 20 69 6e 74 |har(1).p|ut 1 int|
|00002870| 6f 20 6c 69 6e 65 63 6f | 75 6e 74 0d 72 65 70 65 |o lineco|unt.repe|
|00002880| 61 74 20 77 69 74 68 20 | 78 20 3d 20 31 20 74 6f |at with |x = 1 to|
|00002890| 20 31 32 0d 67 65 74 20 | 69 74 65 6d 20 78 20 6f | 12.get |item x o|
|000028a0| 66 20 74 68 65 41 64 64 | 72 65 73 73 44 61 74 61 |f theAdd|ressData|
|000028b0| 0d 69 66 20 69 74 20 ad | 20 65 6d 70 74 79 20 74 |.if it .| empty t|
|000028c0| 68 65 6e 0d 70 75 74 20 | 69 74 20 69 6e 74 6f 20 |hen.put |it into |
|000028d0| 6c 69 6e 65 20 6c 69 6e | 65 63 6f 75 6e 74 20 6f |line lin|ecount o|
|000028e0| 66 20 54 68 65 54 65 78 | 74 0d 61 64 64 20 31 20 |f TheTex|t.add 1 |
|000028f0| 74 6f 20 6c 69 6e 65 63 | 6f 75 6e 74 0d 65 6e 64 |to linec|ount.end|
|00002900| 20 69 66 0d 65 6e 64 20 | 72 65 70 65 61 74 0d 73 | if.end |repeat.s|
|00002910| 65 74 20 69 74 65 6d 64 | 65 6c 20 74 6f 20 22 2c |et itemd|el to ",|
|00002920| 22 0d 0d 70 75 74 20 54 | 68 65 54 65 78 74 20 69 |"..put T|heText i|
|00002930| 6e 74 6f 20 73 74 6f 72 | 79 20 22 41 64 64 72 65 |nto stor|y "Addre|
|00002940| 73 73 22 0d 73 65 6c 65 | 63 74 20 61 6c 6c 20 74 |ss".sele|ct all t|
|00002950| 65 78 74 20 69 6e 20 73 | 74 6f 72 79 20 22 61 64 |ext in s|tory "ad|
|00002960| 64 72 65 73 73 22 0d 73 | 65 74 20 53 74 79 6c 65 |dress".s|et Style|
|00002970| 52 65 63 6f 6d 70 6f 73 | 69 74 69 6f 6e 20 74 6f |Recompos|ition to|
|00002980| 20 66 61 6c 73 65 0d 73 | 65 74 20 74 65 78 74 66 | false.s|et textf|
|00002990| 6f 6e 74 20 74 6f 20 76 | 48 65 6c 76 65 74 69 63 |ont to v|Helvetic|
|000029a0| 61 0d 73 65 74 20 74 65 | 78 74 73 69 7a 65 20 74 |a.set te|xtsize t|
|000029b0| 6f 20 31 30 0d 73 65 74 | 20 52 75 6c 65 72 4a 75 |o 10.set| RulerJu|
|000029c0| 73 74 69 66 69 63 61 74 | 69 6f 6e 20 74 6f 20 6c |stificat|ion to l|
|000029d0| 65 66 74 0d 73 65 74 20 | 53 74 79 6c 65 52 65 63 |eft.set |StyleRec|
|000029e0| 6f 6d 70 6f 73 69 74 69 | 6f 6e 20 74 6f 20 74 72 |ompositi|on to tr|
|000029f0| 75 65 0d 0d 0d 65 6e 64 | 20 50 65 72 73 6f 6e 61 |ue...end| Persona|
|00002a00| 6c 0d 0d 0d 6f 6e 20 54 | 72 61 64 69 74 69 6f 6e |l...on T|radition|
|00002a10| 61 6c 20 0d 47 6c 6f 62 | 61 6c 20 74 68 65 41 64 |al .Glob|al theAd|
|00002a20| 64 72 65 73 73 44 61 74 | 61 2c 20 76 48 65 6c 76 |dressDat|a, vHelv|
|00002a30| 65 74 69 63 61 0d 0d 73 | 65 74 20 69 74 65 6d 64 |etica..s|et itemd|
|00002a40| 65 6c 20 74 6f 20 6e 75 | 6d 74 6f 63 68 61 72 28 |el to nu|mtochar(|
|00002a50| 31 29 0d 70 75 74 20 31 | 20 69 6e 74 6f 20 6c 69 |1).put 1| into li|
|00002a60| 6e 65 63 6f 75 6e 74 0d | 72 65 70 65 61 74 20 77 |necount.|repeat w|
|00002a70| 69 74 68 20 78 20 3d 20 | 20 31 20 74 6f 20 31 32 |ith x = | 1 to 12|
|00002a80| 20 2d 2d 31 20 74 6f 20 | 39 0d 67 65 74 20 69 74 | --1 to |9.get it|
|00002a90| 65 6d 20 78 20 6f 66 20 | 74 68 65 41 64 64 72 65 |em x of |theAddre|
|00002aa0| 73 73 44 61 74 61 0d 69 | 66 20 69 74 20 ad 20 65 |ssData.i|f it . e|
|00002ab0| 6d 70 74 79 20 74 68 65 | 6e 0d 70 75 74 20 69 74 |mpty the|n.put it|
|00002ac0| 20 69 6e 74 6f 20 6c 69 | 6e 65 20 6c 69 6e 65 63 | into li|ne linec|
|00002ad0| 6f 75 6e 74 20 6f 66 20 | 54 68 65 54 65 78 74 0d |ount of |TheText.|
|00002ae0| 61 64 64 20 31 20 74 6f | 20 6c 69 6e 65 63 6f 75 |add 1 to| linecou|
|00002af0| 6e 74 0d 65 6e 64 20 69 | 66 0d 65 6e 64 20 72 65 |nt.end i|f.end re|
|00002b00| 70 65 61 74 0d 73 65 74 | 20 69 74 65 6d 64 65 6c |peat.set| itemdel|
|00002b10| 20 74 6f 20 22 2c 22 0d | 0d 70 75 74 20 54 68 65 | to ",".|.put The|
|00002b20| 54 65 78 74 20 69 6e 74 | 6f 20 73 74 6f 72 79 20 |Text int|o story |
|00002b30| 22 41 64 64 72 65 73 73 | 22 0d 73 65 6c 65 63 74 |"Address|".select|
|00002b40| 20 61 6c 6c 20 74 65 78 | 74 20 69 6e 20 73 74 6f | all tex|t in sto|
|00002b50| 72 79 20 22 61 64 64 72 | 65 73 73 22 0d 73 65 74 |ry "addr|ess".set|
|00002b60| 20 53 74 79 6c 65 52 65 | 63 6f 6d 70 6f 73 69 74 | StyleRe|composit|
|00002b70| 69 6f 6e 20 74 6f 20 66 | 61 6c 73 65 0d 73 65 74 |ion to f|alse.set|
|00002b80| 20 74 65 78 74 66 6f 6e | 74 20 74 6f 20 76 48 65 | textfon|t to vHe|
|00002b90| 6c 76 65 74 69 63 61 0d | 73 65 74 20 74 65 78 74 |lvetica.|set text|
|00002ba0| 73 69 7a 65 20 74 6f 20 | 31 30 0d 73 65 74 20 52 |size to |10.set R|
|00002bb0| 75 6c 65 72 4a 75 73 74 | 69 66 69 63 61 74 69 6f |ulerJust|ificatio|
|00002bc0| 6e 20 74 6f 20 6c 65 66 | 74 0d 73 65 74 20 53 74 |n to lef|t.set St|
|00002bd0| 79 6c 65 52 65 63 6f 6d | 70 6f 73 69 74 69 6f 6e |yleRecom|position|
|00002be0| 20 74 6f 20 74 72 75 65 | 0d 63 6f 70 79 66 69 74 | to true|.copyfit|
|00002bf0| 0d 0d 65 6e 64 20 54 72 | 61 64 69 74 69 6f 6e 61 |..end Tr|aditiona|
|00002c00| 6c 0d 00 00 04 00 09 00 | 02 1a 19 09 ad 00 00 00 |l.......|........|
|00002c10| 00 00 3c 00 14 01 42 01 | ec 00 00 00 00 00 00 00 |..<...B.|........|
|00002c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c80| 00 00 01 00 00 00 01 56 | 00 00 00 56 00 00 00 3c |.......V|...V...<|
|00002c90| 11 c0 bc 99 17 c0 00 4a | 80 38 1e 00 31 a8 89 69 |.......J|.8..1..i|
|00002ca0| 59 fe de f4 52 80 13 af | 10 2e fe de 31 c0 13 0a |Y...R...|....1...|
|00002cb0| 09 5f 53 65 74 53 74 79 | 6c 65 02 00 00 00 53 47 |._SetSty|le....SG|
|00002cc0| 50 41 53 43 50 47 00 00 | 00 00 00 00 00 00 00 00 |PASCPG..|........|
|00002cd0| 00 00 53 47 50 41 53 43 | 50 47 00 00 00 00 00 00 |..SGPASC|PG......|
|00002ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cf0| 00 00 ab 83 6b 0c 00 00 | 2b 99 00 00 01 92 d6 0a |....k...|+.......|
|00002d00| fe cc a8 a2 0a da 28 02 | 00 f8 0a bc a8 99 be b0 |......(.|........|
|00002d10| 46 3c 57 c0 80 2e 1a dc | 0d f1 10 2e fe 74 6b 66 |F<W.....|.....tkf|
|00002d20| 10 3e 00 09 38 37 a8 5f | 0a 15 5f a8 a4 23 18 e0 |.>..87._|.._..#..|
|00002d30| 12 1b 5c 18 2c ff 10 b0 | 71 03 05 9d 15 86 f9 86 |..\.,...|q.......|
|00002d40| 37 0f 01 02 00 d0 2e 1f | ab 6f 60 50 03 01 2d 50 |7.......|.o`P..-P|
|00002d50| 9c 57 06 7d ee 07 30 28 | 2d 7c 2d 2d 1f 70 20 3b |.W.}..0(|-|--.p ;|
|00002d60| b0 87 66 0e 57 09 7d 2d | 7c 08 08 ef 1f 0a 97 a8 |..f.W.}-||.......|
|00002d70| 74 0a 9c 03 97 ff b6 09 | 0a 28 0a 15 27 37 3f a8 |t.......|.(..'7?.|
|00002d80| 00 00 00 52 25 ac b1 21 | 3f e5 32 30 00 04 00 02 |...R%..!|?.20....|
|00002d90| 00 00 00 00 00 00 a6 40 | 2b 29 a6 40 2b 29 a6 3d |.......@|+).@+).=|
|00002da0| 9f b2 00 16 bf 29 00 01 | 00 1c 00 01 0c 42 75 73 |.....)..|.....Bus|
|00002db0| 69 6e 65 73 73 20 49 44 | ba 00 07 73 74 65 76 65 |iness ID|...steve|
|00002dc0| 20 63 00 01 31 00 09 5f | 53 65 74 53 74 79 6c 65 | c..1.._|SetStyle|
|00002dd0| 00 00 00 00 00 00 00 00 | 01 00 00 00 01 56 00 00 |........|.....V..|
|00002de0| 00 56 00 00 00 3c 00 d6 | 3b 7c 0c dc 00 00 00 1c |.V...<..|;|......|
|00002df0| 00 32 00 00 63 6b 69 64 | 00 00 00 0a 00 80 00 00 |.2..ckid|........|
|00002e00| 00 00 00 00 00 d8 21 68 | 09 50 72 6f 6a 65 63 74 |......!h|.Project|
|00002e10| 6f 72 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |or......|........|
|00002e20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+